% V20210224 - 7.7.5 color [2]

INCLUDE "GW.bas"

GW_USE_THEME_CUSTO_ONCE("color=b")
mypage = GW_NEW_PAGE()

GW_ADD_TITLEBAR(mypage, "Page 1")
GW_ADD_TEXT(mypage, "This page is customized with <b>color=b</b>")

DIM pg[6]
FOR i=ASCII("a") TO ASCII("f")
 GW_USE_THEME_CUSTO_ONCE("color="+CHR$(i))
 pg[++n] = GW_ADD_PROGRESSBAR(mypage, "<b>color="+CHR$(i)+"</b> progressbar")
NEXT

GW_ADD_BUTTON(mypage, "EXIT", "BACK")

GW_RENDER(mypage)

FOR i=1 TO 6
 GW_SET_PROGRESSBAR(pg[i], 80+20*RND())
NEXT

% Wait for user action.
GW_WAIT_ACTION$()

END "End of 'color' example."